home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / source / music4c.sit / Music4C Folder / Sources Folder / Preferences.c < prev    next >
Text File  |  1990-06-19  |  18KB  |  776 lines
  1. /*
  2. * ⌐ Graeme Gerrard 1990
  3. * Faculty of Music, University of Melbourne
  4. * Parkville Victoria 3052 Australia.
  5. *
  6. * ARPANET: grae@murdu.ucs.unimelb.edu.au
  7. * telephone: (613) 344 4127, Fax: (613) 344 5346
  8. */
  9. #include "Music4C.h"
  10. #include "Preferences_Dialog.h"
  11. #include "Music4C_Prototype.h"
  12. #include "string.h"
  13.  
  14. void  GetMusic4C_Prefs(void);
  15.  
  16. static pascal char  MyFilter (DialogPtr   theDialog, 
  17.         EventRecord   *theEvent,  short  *itemHit);
  18.  
  19. static void  Refresh_Dialog(DialogPtr    GetSelection);
  20. void  SaveMusic4C_Prefs(void);
  21. void  A_ErrorAlert(void);
  22.  
  23. #define  I_OK   1
  24. #define  I_Cancel   2
  25. #define  I_Pass1   3
  26. #define  I_Pass2   4
  27. #define  I_Pass3   5
  28.  
  29. #define        Pass1Test    1
  30. #define        Pass2Test    2
  31. #define        Pass3Test    3
  32. #define        Synthesize    4
  33.  
  34. static char   ExitDialog; 
  35. static Point   myPt; 
  36. static char   ChangedSelection; 
  37. static MenuHandle   tempMenu; 
  38. static long    Result; 
  39. static short   Popup_I_Run_Up_To;
  40. static short   Popup_I_Sound_File_Format;
  41. static short   Initial_Report_Flags;
  42.  
  43. /* ********************************************* */
  44. extern        int            RunUpTo;
  45. extern        int            ReportFlags;
  46. extern        Boolean        CreateSoundFile;
  47. extern        int            RunToPass1;        /* test pass1 only */
  48. extern        int            RunToPass2;        /* test up to pass2 only */
  49. extern        int            RunToPass3;        /* test pass3 only, i.e. don't write sample file */
  50. extern        int            SFoutputType;
  51. extern        OSErr        theErr;
  52.  
  53. extern        int            out1_flag;        /* pass1 output flag */
  54. extern        int            out2_flag;        /* pass2 output flag */
  55. extern        int            out3_flag;        /* pass3 output flag */
  56.  
  57.  
  58.  
  59.  
  60. void GetMusic4C_Prefs()
  61. {
  62.     int            refNum;
  63.     StringPtr    volName;
  64.     char        buffer[2];
  65.     long        count;
  66.     extern        Str255        FileFormat;
  67.     extern        Str255        SFDirectoryName;
  68.     extern        SysEnvRec    SysEnvData;
  69.     int    i;
  70.     
  71. /* "Music4C_Prefs" is kept in the System Folder */
  72.  
  73.     theErr = FSOpen("\pMusic4C_Prefs", SysEnvData.sysVRefNum, &refNum);
  74.     if (theErr) {
  75.         theErr = Create("\pMusic4C_Prefs", SysEnvData.sysVRefNum, 'MU4C', 'TEXT');
  76.         if ( theErr ) {    /* call Error Alert */
  77.             ParamText("\pCan't create Preferences file", NIL, NIL, NIL);
  78.             A_ErrorAlert();
  79.         }
  80.         theErr = FSOpen("\pMusic4C_Prefs", SysEnvData.sysVRefNum, &refNum);
  81.         /* we have created & opened the file, write in the default prefs */
  82.         buffer[0] = ReportFlags;
  83.         buffer[1] = RunUpTo;
  84.         count = 2L;
  85.         theErr = FSWrite( refNum, &count, &buffer);
  86.  
  87.         count = sizeof(FileFormat);
  88.         theErr = FSWrite( refNum, &count, &FileFormat); /* default SF format */
  89.         
  90.         count = sizeof(SFDirectoryName);
  91.         theErr = FSWrite( refNum, &count, &SFDirectoryName); /* default SF dir */
  92.  
  93.         if ( theErr != noErr ) {
  94.             ParamText("\pError writing Preferences file", NIL, NIL, NIL);
  95.             A_ErrorAlert();
  96.         }
  97.         volName = NIL;
  98.         theErr = FlushVol (volName,  SysEnvData.sysVRefNum);
  99.         theErr = FSClose(refNum);
  100.         theErr = FSOpen("\pMusic4C_Prefs", SysEnvData.sysVRefNum, &refNum);
  101.     }
  102.     /* prefs file is open */
  103.     count = 2L;
  104.     theErr = FSRead (refNum, &count, &buffer);
  105.     if ( theErr != noErr ) {
  106.         ParamText("\pError reading Preferences file", NIL, NIL, NIL);
  107.         A_ErrorAlert();
  108.     }
  109.     ReportFlags = (int)buffer[0];
  110.     RunUpTo = (int)buffer[1];
  111.     
  112.     
  113.     count = sizeof(FileFormat);
  114.     theErr = FSRead (refNum, &count, &FileFormat);
  115.     if ( theErr != noErr ) {
  116.         ParamText("\pError reading Preferences file", NIL, NIL, NIL);
  117.         A_ErrorAlert();
  118.     }
  119.  
  120.     PtoCstr((char *)FileFormat);
  121.     if ( (i = strcmp((char *)FileFormat, "AIFF")) == 0 )
  122.         SFoutputType = AIFF;
  123.     else if ( (i = strcmp((char *)FileFormat, "FLOAT")) == 0 )
  124.         SFoutputType = FLOAT;
  125.     else if ( (i = strcmp((char *)FileFormat, "Sound Designer")) == 0 )
  126.         SFoutputType = SD;
  127.     else if ( (i = strcmp((char *)FileFormat, "INT16")) == 0 )
  128.         SFoutputType = INT16;
  129.     else { /* default */
  130.         strcpy((char *)FileFormat, "FLOAT");
  131.         SFoutputType = FLOAT;
  132.     }
  133.     CtoPstr((char *)FileFormat);
  134.     
  135.     
  136.     count = sizeof(SFDirectoryName);
  137.     theErr = FSRead (refNum, &count, &SFDirectoryName);
  138.     if ( theErr != noErr ) {
  139.         ParamText("\pError reading Preferences file", NIL, NIL, NIL);
  140.         A_ErrorAlert();
  141.     }
  142.     theErr = FSClose(refNum);
  143.     
  144.     CreateSoundFile = FALSE;
  145.     RunToPass1 = 0;
  146.     RunToPass2 = 0;
  147.     RunToPass3 = 0;
  148.     switch( RunUpTo) {
  149.         case Synthesize:
  150.             CreateSoundFile = TRUE;
  151.             break;
  152.         case Pass3Test:
  153.             RunToPass3 = 1;
  154.             break;
  155.         case Pass2Test:
  156.             RunToPass2 = 1;
  157.             break;
  158.         case Pass1Test:
  159.             RunToPass1 = 1;
  160.             break;
  161.     }
  162.     
  163.     out1_flag = 0;
  164.     out2_flag = 0;
  165.     out3_flag = 0;
  166.     
  167.     if( ReportFlags & 4 )
  168.         out3_flag = 1;
  169.     if ( ReportFlags & 2 )
  170.         out2_flag = 1;
  171.     if ( ReportFlags & 1 )
  172.         out1_flag = 1;
  173. }
  174.  
  175.  
  176.  
  177.  
  178. void        SaveMusic4C_Prefs()
  179. {
  180.     int            refNum;
  181.     StringPtr    volName;
  182.     char        buffer[2];
  183.     long        count;
  184.     extern        Str255        FileFormat;
  185.     extern        Str255        SFDirectoryName;
  186.     
  187.     theErr = FSOpen("\pMusic4C_Prefs", SysEnvData.sysVRefNum, &refNum);
  188.     if (theErr) {
  189.         theErr = Create("\pMusic4C_Prefs", SysEnvData.sysVRefNum, 'MU4C', 'TEXT');
  190.         if ( theErr ) {    /* call Error Alert */
  191.             ParamText("\pCan't create Preferences file", NIL, NIL, NIL);
  192.             A_ErrorAlert();
  193.         }
  194.         theErr = FSOpen("\pMusic4C_Prefs", SysEnvData.sysVRefNum, &refNum);
  195.     }
  196.     /* we have created & opened the file, write in the prefs */
  197.     buffer[0] = ReportFlags;
  198.     buffer[1] = RunUpTo;
  199.     count = 2L;
  200.     theErr = FSWrite( refNum, &count, &buffer);
  201.  
  202.     count = sizeof(FileFormat);
  203.     theErr = FSWrite( refNum, &count, &FileFormat); /* default SF format */
  204.     
  205.     count = sizeof(SFDirectoryName);
  206.     theErr = FSWrite( refNum, &count, &SFDirectoryName);
  207.  
  208.     if ( theErr != noErr ) {
  209.         ParamText("\pError writing Preferences file", NIL, NIL, NIL);
  210.         A_ErrorAlert();
  211.     }
  212.     volName = NIL;
  213.     theErr = FlushVol (volName,  SysEnvData.sysVRefNum);
  214.      theErr = FSClose(refNum);
  215. }
  216.  
  217.  
  218.  
  219.  
  220. static pascal char  MyFilter (theDialog, theEvent, itemHit)
  221.     DialogPtr   theDialog; 
  222.     EventRecord   *theEvent;
  223.     short  *itemHit; 
  224. {
  225.     KeyMap    theKeys;
  226.     Rect   tempRect; 
  227.     char   xMyFilter; 
  228.      long    keyCode, charCode;
  229.      
  230.     xMyFilter = FALSE;
  231.     if (theEvent->what == mouseDown) 
  232.     {
  233.         myPt = theEvent->where; 
  234.         GlobalToLocal(&myPt); 
  235.          
  236.         
  237.         SetRect(&tempRect, 160,70,377,90);
  238.         if (PtInRect(myPt,&tempRect) == TRUE)
  239.         {
  240.             *itemHit = 999;
  241.             xMyFilter = TRUE;
  242.         }
  243.         
  244.         SetRect(&tempRect, 120,110,378,130);
  245.         if (PtInRect(myPt,&tempRect) == TRUE)
  246.         {
  247.             *itemHit = 999;
  248.             xMyFilter = TRUE;
  249.         }
  250.          
  251.     }
  252.     else if ( theEvent->what == keyDown ) {
  253.         charCode = BitAnd(theEvent->message, charCodeMask);
  254.         if ( charCode == 0x0D ) {
  255.             SetRect(&tempRect, 240, 168, 320, 188);
  256.             InvertRect(&tempRect);
  257.             *itemHit = I_OK;
  258.             xMyFilter = TRUE;
  259.         }
  260.         else {
  261.         /* got some other keydown */
  262.             *itemHit = 999;
  263.         }
  264.     }
  265.     else
  266.         *itemHit = 999;
  267.         
  268.     return(xMyFilter);
  269. }
  270.  
  271.  
  272. static void  Refresh_Dialog(GetSelection) 
  273.     DialogPtr    GetSelection;
  274. { 
  275.     Rect    tempRect;
  276.     short    DType;
  277.     Handle    DItem;
  278.     ControlHandle    CItem;
  279.     Rect    theRect;
  280.  
  281.     GetDItem(GetSelection,I_OK, &DType, &DItem, &tempRect);
  282.     PenSize(3, 3);
  283.     InsetRect(&tempRect, -4, -4);
  284.     FrameRoundRect(&tempRect, 16, 16); 
  285.     PenSize(1, 1); 
  286.     
  287.     TextFont(systemFont);
  288.     TextSize(12);
  289.     MoveTo(165,84);
  290.     DrawString("\pRun Up To: ");
  291.     SetRect(&tempRect,238,71,370,88);
  292.     EraseRect(&tempRect);
  293.     MoveTo(251,84);
  294.     switch (Popup_I_Run_Up_To)
  295.     {
  296.         case Pass1Test: 
  297.             DrawString("\pPass1 Test");
  298.             /* disable pass2 & 3, Popup_I_Sound_File_Format */
  299.             GetDItem(GetSelection, I_Pass2, &DType, &DItem, &theRect);
  300.             CItem = (ControlHandle)DItem;
  301.             HiliteControl(CItem, 255);
  302.             DisableItem(GetSelection, I_Pass2);
  303.             SetCtlValue(CItem, 0);
  304.             
  305.             GetDItem(GetSelection, I_Pass3, &DType, &DItem, &theRect);
  306.             CItem = (ControlHandle)DItem;
  307.             HiliteControl(CItem, 255);
  308.             DisableItem(GetSelection, I_Pass3);
  309.             SetCtlValue(CItem, 0);
  310.             
  311.             tempMenu = GetMenu(52);
  312.             if ( tempMenu != NIL ) {
  313.                 InsertMenu(tempMenu,-1);
  314.                 DisableItem(tempMenu, 0);
  315.             }
  316.             break;
  317.         case Pass2Test: 
  318.             DrawString("\pPass2 Test");
  319.             GetDItem(GetSelection, I_Pass2, &DType, &DItem, &theRect);
  320.             CItem = (ControlHandle)DItem;
  321.             HiliteControl(CItem, 0);
  322.             EnableItem(GetSelection, I_Pass2);
  323.             if ( ReportFlags & 2)
  324.                 SetCtlValue(CItem, 1);
  325.             else
  326.                 SetCtlValue(CItem, 0);
  327.             
  328.             GetDItem(GetSelection, I_Pass3, &DType, &DItem, &theRect);
  329.             CItem = (ControlHandle)DItem;
  330.             HiliteControl(CItem, 255);
  331.             DisableItem(GetSelection, I_Pass3);
  332.             SetCtlValue(CItem, 0);
  333.             
  334.             tempMenu = GetMenu(52);
  335.             if ( tempMenu != NIL ) {
  336.                 InsertMenu(tempMenu,-1);
  337.                 DisableItem(tempMenu, 0);
  338.             }
  339.             break;
  340.         case Pass3Test: 
  341.             DrawString("\pPass3 Test");
  342.             GetDItem(GetSelection, I_Pass2, &DType, &DItem, &theRect);
  343.             CItem = (ControlHandle)DItem;
  344.             HiliteControl(CItem, 0);
  345.             if ( ReportFlags & 2)
  346.                 SetCtlValue(CItem, 1);
  347.             else     
  348.                 SetCtlValue(CItem, 0);
  349.             
  350.             GetDItem(GetSelection, I_Pass3, &DType, &DItem, &theRect);
  351.             CItem = (ControlHandle)DItem;
  352.             HiliteControl(CItem, 0);
  353.             if ( ReportFlags >= 4)
  354.                 SetCtlValue(CItem, 1);
  355.             else     
  356.                 SetCtlValue(CItem, 0);
  357.             
  358.             EnableItem(GetSelection, I_Pass2);
  359.             EnableItem(GetSelection, I_Pass3);
  360.             tempMenu = GetMenu(52);
  361.             if ( tempMenu != NIL ) {
  362.                 InsertMenu(tempMenu,-1);
  363.                 DisableItem(tempMenu, 0);
  364.             }
  365.             break;
  366.         case Synthesize: 
  367.             DrawString("\pCreate Sound File");
  368.             GetDItem(GetSelection, I_Pass2, &DType, &DItem, &theRect);
  369.             CItem = (ControlHandle)DItem;
  370.             HiliteControl(CItem, 0);
  371.             if ( ReportFlags & 2)
  372.                 SetCtlValue(CItem, 1);
  373.             else     
  374.                 SetCtlValue(CItem, 0);
  375.             
  376.             GetDItem(GetSelection, I_Pass3, &DType, &DItem, &theRect);
  377.             CItem = (ControlHandle)DItem;
  378.             HiliteControl(CItem, 0);
  379.             if ( ReportFlags >= 4)
  380.                 SetCtlValue(CItem, 1);
  381.             else     
  382.                 SetCtlValue(CItem, 0);
  383.  
  384.             tempMenu = GetMenu(52);
  385.             if ( tempMenu != NIL ) {
  386.                 InsertMenu(tempMenu,-1);
  387.                 EnableItem(tempMenu, 0);
  388.             }
  389.             EnableItem(GetSelection, I_Pass2);
  390.             EnableItem(GetSelection, I_Pass3);
  391.             break;
  392.         default:
  393.             DrawString("\p????");
  394.             break;
  395.     }
  396.     
  397.     FrameRect(&tempRect);
  398.     MoveTo(tempRect.left + 1, tempRect.bottom);
  399.     LineTo(tempRect.right, tempRect.bottom);
  400.     LineTo(tempRect.right, tempRect.top + 1);
  401.     
  402.     TextFont(systemFont);
  403.     TextSize(12);
  404.     TextFont(systemFont);
  405.     TextSize(12);
  406.     MoveTo(125,124);
  407.     DrawString("\pSound File Format: ");
  408.     SetRect(&tempRect,253,111,371,128);
  409.     EraseRect(&tempRect);
  410.     MoveTo(266,124);
  411.     if ( Popup_I_Run_Up_To == Synthesize ) {
  412.         switch (Popup_I_Sound_File_Format)
  413.         {
  414.             case AIFF: 
  415.                 DrawString("\pAIFF");
  416.                 break;
  417.             case FLOAT: 
  418.                 DrawString("\pFLOAT");
  419.                 break;
  420.             case INT16: 
  421.                 DrawString("\pINT16");
  422.                 break;
  423.             case SD: 
  424.                 DrawString("\pSound Designer");
  425.                 break;
  426.             default:
  427.                 DrawString("\p????");
  428.                 break;
  429.         }
  430.     }
  431.     FrameRect(&tempRect);
  432.     MoveTo(tempRect.left + 1, tempRect.bottom);
  433.     LineTo(tempRect.right, tempRect.bottom);
  434.     LineTo(tempRect.right, tempRect.top + 1);
  435.     
  436.     TextFont(systemFont);
  437.     TextSize(12);
  438. }
  439.  
  440.  
  441.  
  442. void   D_Preferences_Dialog()
  443. {
  444.     DialogPtr   GetSelection;
  445.     Rect           tempRect;
  446.     short        DType;
  447.     Handle        DItem;
  448.     ControlHandle    CItem;
  449.     short       itemHit;
  450.     short       temp;
  451.     int        i;
  452.      
  453.          
  454.     GetSelection = GetNewDialog(3, NIL, (WindowPtr)-1);
  455.      
  456.     tempRect.top = GetSelection->portRect.top;
  457.     tempRect.left = GetSelection->portRect.left;
  458.     tempRect.bottom = GetSelection->portRect.bottom;
  459.     tempRect.right = GetSelection->portRect.right;
  460.     tempRect.top = ((screenBits.bounds.bottom - screenBits.bounds.top) - (tempRect.bottom - tempRect.top)) / 2;
  461.     tempRect.left = ((screenBits.bounds.right - screenBits.bounds.left) - (tempRect.right - tempRect.left)) / 2;
  462.     MoveWindow(GetSelection, tempRect.left, tempRect.top, TRUE);
  463.      
  464.     ShowWindow(GetSelection);
  465.     SelectWindow(GetSelection);
  466.     SetPort(GetSelection);
  467.      
  468.      
  469.      
  470.     /* Setup initial conditions */
  471.      Popup_I_Run_Up_To = RunUpTo;
  472.      Popup_I_Sound_File_Format = SFoutputType;
  473.     Initial_Report_Flags = ReportFlags;
  474.  
  475.     /* report flags */
  476.     GetDItem(GetSelection,I_Pass3, &DType, &DItem, &tempRect);
  477.     CItem = (ControlHandle)DItem; 
  478.     if ( ReportFlags >= 4 && RunUpTo >= 3)
  479.         SetCtlValue(CItem, 1);
  480.     else     
  481.         SetCtlValue(CItem, 0);
  482.         
  483.         
  484.     GetDItem(GetSelection,I_Pass2, &DType, &DItem, &tempRect);
  485.     CItem = (ControlHandle)DItem; 
  486.     if ( ReportFlags & 2 && RunUpTo >= 2)
  487.         SetCtlValue(CItem, 1);
  488.     else     
  489.         SetCtlValue(CItem, 0);
  490.     
  491.     GetDItem(GetSelection,I_Pass1, &DType, &DItem, &tempRect);
  492.     CItem = (ControlHandle)DItem; 
  493.     if ( ReportFlags & 1 && RunUpTo >= 1)
  494.         SetCtlValue(CItem, 1);
  495.     else     
  496.         SetCtlValue(CItem, 0);
  497.         
  498.     
  499.     
  500.     Refresh_Dialog(GetSelection); 
  501.      
  502.     ExitDialog = FALSE; 
  503.      
  504.     do {
  505.         ModalDialog(&MyFilter, &itemHit); 
  506.         GetDItem(GetSelection, itemHit, &DType, &DItem, &tempRect);
  507.         CItem = (ControlHandle)DItem; 
  508.          
  509.         /* Handle it real time */
  510.         if (itemHit == I_OK ) {
  511.             RunUpTo = Popup_I_Run_Up_To;
  512.             SFoutputType = Popup_I_Sound_File_Format;
  513.             Initial_Report_Flags = ReportFlags;
  514.             ExitDialog =TRUE;
  515.             Refresh_Dialog(GetSelection); 
  516.         }
  517.         
  518.         if (itemHit == I_Cancel )
  519.         {
  520.             Popup_I_Run_Up_To = RunUpTo;
  521.             Popup_I_Sound_File_Format = SFoutputType;
  522.             ReportFlags = Initial_Report_Flags;
  523.             ExitDialog =TRUE;
  524.         }
  525.         
  526.         if (itemHit == I_Pass3 )
  527.         {
  528.             temp = GetCtlValue(CItem);
  529.             SetCtlValue(CItem, ((temp + 1) & 1));
  530.             temp = GetCtlValue(CItem);
  531.             if ( temp ) {
  532.                 if ( ReportFlags < 4 )
  533.                     ReportFlags += 4;
  534.             }
  535.             else {
  536.                 if ( ReportFlags >= 4 )
  537.                     ReportFlags -= 4;
  538.             }
  539.         }
  540.         
  541.         if (itemHit == I_Pass2 )
  542.         {
  543.             temp = GetCtlValue(CItem);
  544.             SetCtlValue(CItem, ((temp + 1) & 1));
  545.             temp = GetCtlValue(CItem);
  546.             if ( temp ) {
  547.                 if ( !(ReportFlags & 2) )
  548.                     ReportFlags += 2;
  549.             }
  550.             else {
  551.                 if ( ReportFlags & 2 )
  552.                     ReportFlags -= 2;
  553.             }
  554.         }
  555.         
  556.         if (itemHit == I_Pass1 )
  557.         {
  558.             temp = GetCtlValue(CItem);
  559.             SetCtlValue(CItem, ((temp + 1) & 1));
  560.             temp = GetCtlValue(CItem);
  561.             if ( temp ) {
  562.                 if ( !(ReportFlags & 1) )
  563.                     ReportFlags += 1;
  564.             }
  565.             else {
  566.                 if ( ReportFlags & 1 )
  567.                     ReportFlags & 1;
  568.             }
  569.         }
  570.         
  571.         
  572.         SetRect(&tempRect, 160,70,377,90);
  573.         if ((PtInRect(myPt,&tempRect) == TRUE) && (itemHit == 999))
  574.         {
  575.             ChangedSelection = FALSE;
  576.             TextFont(systemFont);
  577.             TextSize(12);
  578.             
  579.             tempMenu= GetMenu(53);
  580.             if (tempMenu != NIL)
  581.             {
  582.                 InsertMenu (tempMenu,-1);
  583.                 SetRect(&tempRect,160,72,238,88);
  584.                 InvertRect(&tempRect);
  585.                 myPt.v  = 72;
  586.                 myPt.h  = 238;
  587.                 LocalToGlobal(&myPt);
  588.                 
  589.                 CheckItem(tempMenu,Popup_I_Run_Up_To,TRUE);
  590.                 for ( i = 1; i < 5; i ++ )
  591.                     if ( i !=     Popup_I_Run_Up_To )
  592.                         CheckItem(tempMenu,i,FALSE);
  593.                     else
  594.                         CheckItem(tempMenu,i,TRUE);
  595.                 Result = PopUpMenuSelect(tempMenu, myPt.v, myPt.h,  Popup_I_Run_Up_To);
  596.                 
  597.                 if ((Popup_I_Run_Up_To != LoWord(Result)) && (LoWord(Result) > 0))
  598.                 {
  599.                     CheckItem(tempMenu,Popup_I_Run_Up_To,FALSE);
  600.                     ChangedSelection = TRUE;
  601.                     Popup_I_Run_Up_To = LoWord(Result);
  602.                 }
  603.                 
  604.                 DeleteMenu(53);
  605.                 InvertRect(&tempRect);
  606.                 
  607.                 if (ChangedSelection == TRUE)
  608.                 {
  609.                     SetRect(&tempRect,240,72,369,87);
  610.                     EraseRect(&tempRect);
  611.                     
  612.                     MoveTo(tempRect.left + 12,tempRect.top + 12);
  613.                     switch (Popup_I_Run_Up_To)
  614.                     {
  615.                         case Pass1Test: 
  616.                                 DrawString("\pPass1 Test");
  617.                                 break;
  618.                         case Pass2Test: 
  619.                                 DrawString("\pPass2 Test");
  620.                                 break;
  621.                         case Pass3Test: 
  622.                                 DrawString("\pPass3 Test");
  623.                                 break;
  624.                         case Synthesize: 
  625.                                 DrawString("\pCreate Sound File");
  626.                                 break;
  627.                         default:
  628.                                 break;
  629.                     }
  630.                 }
  631.             }
  632.             TextFont(systemFont);
  633.             TextSize(12);
  634.         }
  635.         
  636.         
  637.         SetRect(&tempRect, 120,110,378,130);
  638.         if ((PtInRect(myPt,&tempRect) == TRUE) && (itemHit == 999))
  639.         {
  640.             ChangedSelection = FALSE;
  641.             TextFont(systemFont);
  642.             TextSize(12);
  643.             
  644.             tempMenu= GetMenu(52);
  645.             if (tempMenu != NIL)
  646.             {
  647.                 InsertMenu (tempMenu,-1);
  648.                 SetRect(&tempRect,120,112,253,128);
  649.                 InvertRect(&tempRect);
  650.                 myPt.v  = 112;
  651.                 myPt.h  = 253;
  652.                 LocalToGlobal(&myPt);
  653.             
  654.                 for ( i = 1; i < 5; i ++ )
  655.                     if ( i !=     Popup_I_Sound_File_Format )
  656.                         CheckItem(tempMenu,i,FALSE);
  657.                     else
  658.                         CheckItem(tempMenu,i,TRUE);
  659.                 Result = PopUpMenuSelect(tempMenu, myPt.v, myPt.h,  Popup_I_Sound_File_Format);
  660.                 
  661.                 if ((Popup_I_Sound_File_Format != LoWord(Result)) && (LoWord(Result) > 0))
  662.                 {
  663.                     CheckItem(tempMenu,Popup_I_Sound_File_Format,FALSE);
  664.                     ChangedSelection = TRUE;
  665.                     Popup_I_Sound_File_Format = LoWord(Result);
  666.                 }
  667.                 
  668.                 DeleteMenu(52);
  669.                 InvertRect(&tempRect);
  670.                 
  671.                 if (ChangedSelection == TRUE)
  672.                 {
  673.                     SetRect(&tempRect,255,112,370,127);
  674.                     EraseRect(&tempRect);
  675.                     
  676.                     MoveTo(tempRect.left + 12,tempRect.top + 12);
  677.                     switch (Popup_I_Sound_File_Format)
  678.                     {
  679.                         case AIFF: 
  680.                                 DrawString("\pAIFF");
  681.                                 break;
  682.                         case FLOAT: 
  683.                                 DrawString("\pFLOAT");
  684.                                 break;
  685.                         case INT16: 
  686.                                 DrawString("\pINT16");
  687.                                 break;
  688.                         case SD: 
  689.                                 DrawString("\pSound Designer");
  690.                                 break;
  691.                         default:
  692.                                 break;
  693.                     }
  694.                 }
  695.             }
  696.             TextFont(systemFont);
  697.             TextSize(12);
  698.         }         
  699.         Refresh_Dialog(GetSelection); 
  700.     } 
  701.     while (ExitDialog == FALSE);
  702.      
  703.      if ( itemHit != I_Cancel ) {
  704.          ReportFlags = 0;
  705.          out1_flag = 0;
  706.          out2_flag = 0;
  707.          out3_flag = 0;
  708.         /* Get results after dialog */
  709.         GetDItem(GetSelection,I_Pass3, &DType, &DItem, &tempRect);
  710.         CItem = (ControlHandle)DItem;
  711.         temp = GetCtlValue(CItem);
  712.         if ( (**CItem).contrlValue == 1) {
  713.             ReportFlags = 4;
  714.             out3_flag = 1;
  715.         }
  716.             
  717.         GetDItem(GetSelection,I_Pass2, &DType, &DItem, &tempRect);
  718.         CItem = (ControlHandle)DItem;
  719.         temp = GetCtlValue(CItem);
  720.         if ( (**CItem).contrlValue == 1) {
  721.             ReportFlags += 2;
  722.             out2_flag = 1;
  723.         }
  724.         
  725.         GetDItem(GetSelection,I_Pass1, &DType, &DItem, &tempRect);
  726.         CItem = (ControlHandle)DItem;
  727.         temp = GetCtlValue(CItem);
  728.         if ( (**CItem).contrlValue == 1) {
  729.             ReportFlags += 1;
  730.             out1_flag = 1;
  731.         }
  732.     }
  733.     
  734.         
  735.     DisposDialog(GetSelection); 
  736.     switch (Popup_I_Sound_File_Format) {
  737.         case    SD:
  738.             PstringCopy((char *)FileFormat, "\pSound Designer");
  739.             break;
  740.         case    AIFF:
  741.             PstringCopy((char *)FileFormat, "\pAIFF");
  742.             break;
  743.         case    FLOAT:
  744.             PstringCopy((char *)FileFormat, "\pFLOAT");
  745.             break;
  746.         case    INT16:
  747.             PstringCopy((char *)FileFormat, "\pINT16");
  748.             break;
  749.     }
  750.     
  751.     CreateSoundFile = FALSE;
  752.     RunToPass1 = 0;
  753.     RunToPass2 = 0;
  754.     RunToPass3 = 0;
  755.     switch( RunUpTo) {
  756.         case Synthesize:
  757.             CreateSoundFile = TRUE;
  758.             break;
  759.         case Pass3Test:
  760.             RunToPass3 = 1;
  761.             break;
  762.         case Pass2Test:
  763.             RunToPass2 = 1;
  764.             break;
  765.         case Pass1Test:
  766.             RunToPass1 = 1;
  767.             break;
  768.     }
  769.     
  770.     
  771.     SaveMusic4C_Prefs();
  772. }
  773.  
  774.  
  775.  
  776.